TrialNotebook

# need old Glimma for this dataset
library(Glimma)
library(GlimmaV2)

data(lymphomaRNAseq)
rnaseq <- lymphomaRNAseq


# add lane
groups <- data.frame(genotype=rnaseq$samples$group,
                     lane= as.character(c(rep(4,5),3,3)),
                     miscCont=c(rep(4000,5),300,250),
                     miscDisc=c("blue","red",rep("green",5)))


# add libsize
groups <- cbind(groups, libsize=rnaseq$samples$lib.size)
groups

GlimmaV2(plotType="MA", x=rnaseq, groups=groups)

library(DT)

## Warning: package 'DT' was built under R version 3.6.3

datatable(iris, options = list(pageLength = 5))